home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (PO) / Nibble Volume 10, No. 04 (1989-04)(MicroSPARC)(Side A)[a].zip / Nibble Volume 10, No. 04 (1989-04)(MicroSPARC)(Side A)[a].po / NIBBLE.bas < prev    next >
BASIC Source File  |  1996-12-24  |  372b  |  2 lines
  1. 10  PRINT  CHR$(4);"PR#3": PRINT  CHR$(17); CHR$(27): INVERSE : HTAB 10: PRINT "A";: HTAB 31: PRINT "A";: NORMAL : FOR P = 1 TO 20: READ Q: POKE 1161 +P,Q: DATA 14,9,2,2,12,5,32,9,19,32,20,8,5,32,2,5,19,20,33,33:M =  PEEK(49200): NEXT P
  2. 20  INVERSE :Y = 11:Z = 30: FOR X = 3 TO 12: VTAB X: HTAB Y: PRINT "@";: HTAB Z: PRINT "@";:Y = Y +1:Z = Z -1: NEXT X: NORMAL : VTAB 22